home *** CD-ROM | disk | FTP | other *** search
/ Aminet 8 / Aminet 8 (1995)(GTI - Schatztruhe)[!][Oct 1995].iso / Aminet / dev / gcc / gcc270_base.lha / gnu / ManualBrowser / SAS_Startup.a < prev    next >
Text File  |  1994-09-05  |  417b  |  28 lines
  1.     XDEF @exit
  2.     XDEF _SysBase
  3.  
  4.     XREF @Main
  5.     XREF _LinkerDB
  6.  
  7. *************************************************
  8.  
  9.     SECTION text,code
  10.  
  11.     lea _LinkerDB,a4
  12.     move.l (4).w,_SysBase(a4)
  13.     move.l SP,StackPointer(a4)
  14.     bsr @Main
  15. @exit:    move.l StackPointer(a4),SP
  16.     rts
  17.  
  18. *************************************************
  19.  
  20.     SECTION data,bss
  21.  
  22. StackPointer:    ds.l 1
  23. _SysBase:    ds.l 1
  24.  
  25. *************************************************
  26.  
  27.     END
  28.